www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminKernel\D_update_all_pages_before_cmsb.asp
<%
'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************
%>
<DIV id="loading_msg" style="position:absolute; z-index:200; top:210px; left:184px; background-color:#ffffff; width: 306px; height: 22px;" >
请稍后......</div>
<%
dir_set="../../"
%>
<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->
<!--#include file=../inc/checkadmin2.asp-->
<!--#include file=../../inc/functionFiless.asp-->
<script type="text/javascript" src="../../inc/zxml.js"></script>
<!--#include file=../../inc/ajaxLIB_no_loader.asp-->
<!--#include file=../../inc/ND_class_function.asp-->
<%
if find_dataw("qitashezhi123","0",6)<>"1" and qx_if_max=0 then
response.redirect "../D_suodinguser.asp"
end if
%>
<%
Server.ScriptTimeout=9999999
session.timeout=600
call all_update_qiantai_web_filenames_config_xml()
' 检测组件变量
dim isobj,VerObj,TestObj
'检查组件是否被支持及组件版本的子程序
sub ObjTest(strObj)
on error resume next
IsObj=false
VerObj=""
set TestObj=server.CreateObject (strObj)
If -2147221005 <> Err then '感谢网友iAmFisher的宝贵建议
IsObj = True
VerObj = TestObj.version
if VerObj="" or isnull(VerObj) then VerObj=TestObj.about
end if
set TestObj=nothing
End sub
ObjTest(fssoo_nd_var_str_x_customx)
if not isobj then
sss1="检测中:对不起，由于你的系统不支持FSO组件,所以无法使用本后台"
%>
<script language="javascript">
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000><%=sss1%></font>';",300);
alert("对不起，由于你的系统不支持FSO组件,所以无法使用本后台");
alert("对不起，由于你的系统不支持FSO组件,所以无法使用本后台");
alert("对不起，由于你的系统不支持FSO组件,所以无法使用本后台");
</script>
<%
response.end
else
sss1="检测中:支持FSO......"
nwhen_usinga=Application("newdsoft_web_user_mdb_when_using")
nis_usinga=Application("newdsoft_web_user_mdb_using")
maxxx_tiimeout_a_mdb=60*10
if (not isempty(nwhen_usinga)) or nwhen_usinga<>"" or isDate(nwhen_usinga) then
If DateDiff("s",nwhen_usinga,Now())>maxxx_tiimeout_a_mdb and nis_usinga="yes" Then
Application.Lock()
Application("newdsoft_web_user_mdb_using")="no"
Application.UnLock()
end if
end if
if not isDate(nwhen_usinga) then
Application.Lock()
Application("newdsoft_web_user_mdb_using")="no"
Application("newdsoft_web_user_mdb_when_using")=now()
Application.UnLock()
end if
if Application("newdsoft_web_user_mdb_using")<>"yes" then
Application.Lock()
'Application("newdsoft_web_user_mdb_using")="yes"
Application("newdsoft_web_user_mdb_using")="no"
Application("newdsoft_web_user_mdb_when_using")=now()
Application.UnLock()
else
%>
<script language="javascript">
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>对不起，当前有其他人正在进行 锁定性数据库读写操作，请稍后再重试(最多需等待11分钟)....</font>';",100);
alert("对不起，当前有其他人正在进行 锁定性数据库读写操作，请稍后再重试(最多需等待11分钟)");
</script>
<%
response.end
end if
%>
<script language="javascript">
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000><%=sss1%></font>';",0);
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>加载要更新的标签列表中....</font>';",800);
var okeeee=0;
var needdo=1;
var w ;
var w2 ;
var a=AJAXcreateXMLdocument();
a.onreadystatechange=function(){
if (a.readyState==4)
{
if (a.parseError.errorCode!=0){
alert("数据读取错误,请重试!!,请关闭所有占用数据库的软件如ACCESS,再重新进入本功能");
}
var root=a.documentElement;
var staut=root.firstChild.text;
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"加载要更新的自定义标签列表成功......"+"</font>';",1500);
okeeee=1;
sys_label_get();
}
}
a.async=true; //异步模式
a.load("../adminLabel/D_ajax_update_custom_label_list_to_mdb_from_files.asp");
setTimeout("err_timeout();",38000);
function err_timeout(){
if (okeeee==0){
alert("你可能打开了数据库软件ACCESS等,请先关闭它,再刷新本页,或者数据库已锁定,无法进入后台!");
}
}
function sys_label_get(){
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>加载要更新的系统标签列表中....</font>';",800);
var a=AJAXcreateXMLdocument();
a.onreadystatechange=function(){
if (a.readyState==4)
{
if (a.parseError.errorCode!=0){
alert("数据读取错误,请重试!!");
}
var root=a.documentElement;
var staut=root.firstChild.text;
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"加载要更新的系统标签列表成功......"+"</font>';",1500);
//循环延时，防止卡住:
w = setInterval("do_kernel()",40);
}
}
a.async=true; //异步模式
a.load("../adminLabel/D_ajax_update_sys_label_list_to_mdb_from_files.asp");
}
var ended=0;
var ended2=0;
var pos="";
var msg1="";
var a2=AJAXcreateXMLdocument();
a2.onreadystatechange=function(){
if (a2.readyState==4)
{
if (a2.parseError.errorCode!=0){
alert("数据读取错误,请重试!!");
}
var root=a2.documentElement;
var ss1=root.firstChild.text;
var ss2=root.childNodes[1].text;
var ss3=root.childNodes[2].text;
if (ss1==1){ended=1;}
pos=ss2;
msg1=ss3;
needdo=1;
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"正在更新 "+msg1+"......"+"</font>';",1500);
if (ended==0){
}
else
{
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"现在正在统计要编译的文件列表，可能需要较长时间，请稍后......"+"</font>';",1500);
templates_list_get();
}
}
}
function do_kernel(){
if (needdo==1&&ended==0){
needdo=0;
a2.async=true; //异步模式
a2.load("../adminLabel/D_ajax_update_label_to_mdb_from_files_by_step.asp?pos="+pos);
}
}
function templates_list_get(){
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>加载要编译的 子模板 列表中....</font>';",800);
var a=AJAXcreateXMLdocument();
a.onreadystatechange=function(){
if (a.readyState==4)
{
if (a.parseError.errorCode!=0){
alert("数据读取错误,请重试!!");
}
var root=a.documentElement;
var staut=root.firstChild.text;
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"加载要编译的子模板列表成功...,编译 子模板中..."+"</font>';",1500);
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>开始编译 子模板 ....</font>';",800);
//循环延时，防止卡住:
w2 = setInterval("do_kernel_complie()",40);
}
}
a.async=true; //异步模式
a.load("D_ajax_get_all_pages_list.asp?ppath=<%=request("ppath")%>");
}
needdo=1;
var pos22="";
ended2=0;
var stu="ok";
var a22=AJAXcreateXMLdocument();
a22.onreadystatechange=function(){
if (a22.readyState==4)
{
if (a22.parseError.errorCode!=0){
alert("数据读取错误,或服务器过载(如果总过载,请在自己的本地计算机上运行本系统并进行此操作),请重试!!");
}
var root2=a22.documentElement;
var s2s1=root2.firstChild.text;
var s2s2=root2.childNodes[1].text;
var s2s3=root2.childNodes[2].text;
var s2s4=root2.childNodes[3].text;
if (s2s1==1){ended2=1;}
pos22=s2s2;
msg1=s2s3;
needdo=1;
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"正在编译 "+msg1+",id="+pos22+"......"+"</font>';",1500);
if (ended2==0){
}
else
{
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"生成与刷新页面完成......"+"</font>';",1500);
alert("切换成功");
setTimeout("self.location='../D_admin_index_select.asp';",200);
}
if (s2s4!="ok"){
if (s2s4.indexOf("delete_main_shibai")==-1){
stu="shibai";
setTimeout("document.all.loading_msg.innerHTML='<font color=#000000>"+"编译模板出错，请重试...(出错原因:"+s2s4+")</font>';",1500);
alert("编译模板出错，请重试...(出错原因:"+s2s4+")");
}
else
{
var ssssdfaa=s2s4.substring(19,s2s4.length)
setTimeout("document.all.loading_msg.innerHTML='<font color=#ff0000>"+"删除 "+ssssdfaa+"目录失败,可能此目录正在被使用,将忽略此错误,继续编译)</font>';",100);
}
}
}
}
function do_kernel_complie(){
if (needdo==1&&ended2==0&&stu=="ok"){
needdo=0;
a22.async=true; //异步模式
a22.load("D_ajax_do_cmsb.asp?pos="+pos22);
}
}
</script>
<%
end if
%>